:- module(occur).
:- export replace / 4.
:- export position / 3.
:- export patharg / 3.
:- export freeof / 2.
:- export contains / 2.